home *** CD-ROM | disk | FTP | other *** search
/ IBM Aptiva Multimedia Exploration CD / Aptiva DEMO CD.iso / dos63 / graphics.pro < prev    next >
Text File  |  1993-12-31  |  24KB  |  572 lines
  1. ;----------------------------------------------------------------------------
  2. ; GRAPHICS.PRO File for PC DOS
  3. ;----------------------------------------------------------------------------
  4.      ;(C)Copyright 1988-1993 IBM Corporation
  5.      ;Licensed Material - Property of IBM
  6. ;----------------------------------------------------------------------------
  7. PRINTER HPDEFAULT
  8. ;
  9. ; SETUP
  10. ;          esc*rA               start graphics at current cursor position
  11. ;                               using current graphics resolution.
  12. ; GRAPHICS
  13. ;          esc*b COUNT W DATA
  14. ; RESTORE
  15. ;          esc*rB               end graphics
  16. ;----------------------------------------------------------------------------
  17.   DEFINE DATA,ROW
  18.  
  19.   DISPLAYMODE 4,5,13,19                                 ; 320x200
  20.     SETUP 27,42,114,65
  21.     GRAPHICS 27,42,98,COUNT,87,DATA
  22.     PRINTBOX STD,2,2,ROTATE
  23.     RESTORE 27,42,114,66
  24.  
  25.   DISPLAYMODE 6,14                                      ; 640x200
  26.     SETUP 27,42,114,65
  27.     GRAPHICS 27,42,98,COUNT,87,DATA
  28.     PRINTBOX STD,2,1,ROTATE
  29.     RESTORE 27,42,114,66
  30.  
  31.   DISPLAYMODE 15,16                                     ; 640x350
  32.     SETUP 27,42,114,65
  33.     GRAPHICS 27,42,98,COUNT,87,DATA
  34.     PRINTBOX STD,2,1
  35.     RESTORE 27,42,114,66
  36.  
  37.   DISPLAYMODE 17,18                                     ; 640x480
  38.     SETUP 27,42,114,65
  39.     GRAPHICS 27,42,98,COUNT,87,DATA
  40.     PRINTBOX STD,2,1
  41.     RESTORE 27,42,114,66
  42. ;----------------------------------------------------------------------------
  43. PRINTER DESKJET,LASERJETII
  44. ;
  45. ; SETUP
  46. ;          esc*t75R             select 75dpi
  47. ;          esc*t150R            select 150dpi
  48. ;          esc*t300R            select 300dpi
  49. ;          esc&a#h#V            move cursor position, in decipoints
  50. ;          esc*r1A              start graphics at current cursor position
  51. ; GRAPHICS
  52. ;          esc*b COUNT W DATA
  53. ; RESTORE
  54. ;          esc*rB               end graphics
  55. ;----------------------------------------------------------------------------
  56.   DEFINE DATA,ROW
  57.  
  58.   DISPLAYMODE 4,5,13,19                                 ; 320x200 100dpi
  59.     SETUP 27,42,116,49,48,48,82,27,38,97,48,104,48,27,42,114,49,65
  60.     GRAPHICS 27,42,98,COUNT,87,DATA
  61.     PRINTBOX STD,4,3,ROTATE
  62.     RESTORE 27,42,114,66,12
  63.  
  64.   DISPLAYMODE 6,14                                      ; 640x200 150dpi
  65.     SETUP 27,42,116,49,53,48,82,27,38,97,57,55,53,104,52,57,56,86,27,42,114,49,65
  66.     GRAPHICS 27,42,98,COUNT,87,DATA
  67.     PRINTBOX STD,4,2,ROTATE
  68.     RESTORE 27,42,114,66,12
  69.  
  70.  
  71.   DISPLAYMODE 15,16                                     ; 640x350 150dpi
  72.     SETUP 27,42,116,49,53,48,82,27,38,97,49,50,49,53,104,54,48,55,86,27,42,114,49,65
  73.     GRAPHICS 27,42,98,COUNT,87,DATA
  74.     PRINTBOX STD,2,2,ROTATE
  75.     RESTORE 27,42,114,66,12
  76.  
  77.   DISPLAYMODE 17,18                                     ; 640x480 150dpi
  78.     SETUP 27,42,116,49,53,48,82,27,38,97,53,56,56,104,54,57,55,86,27,42,114,49,65
  79.     GRAPHICS 27,42,98,COUNT,87,DATA
  80.     PRINTBOX STD,2,2,ROTATE
  81.     RESTORE 27,42,114,66,12
  82. ;----------------------------------------------------------------------------
  83. PRINTER LASERJET
  84. ;
  85. ; SETUP
  86. ;          esc*t75R             select 75dpi
  87. ;          esc&a#h#V            move cursor position in decipoints
  88. ;          esc*r1A              start graphics at current cursor position
  89. ; GRAPHICS
  90. ;          esc*b COUNT W DATA
  91. ; RESTORE
  92. ;          esc*rB               end graphics
  93. ;----------------------------------------------------------------------------
  94.   DEFINE DATA,ROW
  95.  
  96.   DISPLAYMODE 4,5,13,19                                 ; 320x200 75dpi
  97.     SETUP 27,42,116,55,53,82,27,38,97,49,48,50,48,104,53,52,51,86,27,42,114,49,65
  98.     GRAPHICS 27,42,98,COUNT,87,DATA
  99.     PRINTBOX STD,2,2,ROTATE
  100.     RESTORE 27,42,114,66,12
  101.  
  102.   DISPLAYMODE 6,14                                      ; 640x200 75dpi
  103.     SETUP 27,42,116,55,53,82,27,38,97,49,48,50,48,104,53,52,51,86,27,42,114,49,65
  104.     GRAPHICS 27,42,98,COUNT,87,DATA
  105.     PRINTBOX STD,2,1,ROTATE
  106.     RESTORE 27,42,114,66,12
  107.  
  108.   DISPLAYMODE 15,16                                     ; 640x350 75dpi
  109.     SETUP 27,42,116,55,53,82,27,42,114,49,65
  110.     GRAPHICS 27,42,98,COUNT,87,DATA
  111.     PRINTBOX STD,2,1 ROTATE
  112.     RESTORE 27,42,114,66,12
  113.  
  114.   DISPLAYMODE 17,18                                     ; 640x480 75dpi
  115.     SETUP 27,42,116,55,53,82,27,42,114,48,65
  116.     GRAPHICS 27,42,98,COUNT,87,DATA
  117.     PRINTBOX STD,2,1,ROTATE
  118.     RESTORE 27,42,114,66,12
  119. ;----------------------------------------------------------------------------
  120. PRINTER PAINTJET
  121. ;
  122. ; Treats the Paintjet as a B&W device for both text and color.  Specifying
  123. ; one color plane uses just black and white as the two available colors.
  124. ;
  125. ; SETUP
  126. ;          esc*t90R             select 90dpi
  127. ;          esc*t180R            select 180dpi
  128. ;          esc*r1U              select 1 color plane and reset color palette.
  129. ;          esc&a#H              move curser position, in decipoints.
  130. ;          esc*r1A              start graphics at current cursor position.
  131. ; GRAPHICS
  132. ;          esc*b COUNT W DATA
  133. ; RESTORE
  134. ;          esc*rB               end graphics
  135. ;----------------------------------------------------------------------------
  136.   DEFINE        DATA,ROW
  137.  
  138.   DISPLAYMODE   4,5,13,19                               ; 320x200 180dpi
  139.     SETUP       27,42,116,49,56,48,82,27,42,114,49,85,27,38,97,49,50,54,48,72,27,42,114,49,65
  140.     GRAPHICS    27,42,98,COUNT,87,DATA
  141.     PRINTBOX    STD,4,3,ROTATE
  142.     RESTORE     27,42,114,066
  143.  
  144.   DISPLAYMODE   6,14                                    ; 640x200 180dpi
  145.     SETUP       27,42,116,49,56,48,82,27,42,114,49,85,27,38,97,49,50,54,48,72,27,42,114,49,65
  146.     GRAPHICS    27,42,98,COUNT,87,DATA
  147.     PRINTBOX    STD,4,2,ROTATE
  148.     RESTORE     27,42,114,066
  149.  
  150.   DISPLAYMODE   15,16                                   ; 640x350  180dpi
  151.     SETUP       27,42,116,49,56,48,82,27,42,114,49,85,27,38,97,52,53,72,27,42,114,49,65
  152.     GRAPHICS    27,42,98,COUNT,87,DATA
  153.     PRINTBOX    STD,4,3,ROTATE
  154.     RESTORE     27,42,114,066
  155.  
  156.   DISPLAYMODE   17,18                                   ; 640x480  180dpi
  157.     SETUP       27,42,116,49,56,48,82,27,42,114,49,85,27,38,97,57,53,48,72,27,42,114,49,65
  158.     GRAPHICS    27,42,98,COUNT,87,DATA
  159.     PRINTBOX    STD,2,2,ROTATE
  160.     RESTORE     27,42,114,066
  161. ;----------------------------------------------------------------------------
  162. PRINTER QUIETJET
  163. ;
  164. ; SETUP
  165. ;          esc*t96R             select 96x96dpi
  166. ;          esc*t192R            select 192x192dpi
  167. ;          esc*t1280S           select 192x96dpi
  168. ;          esc*rA               start graphics at current cursor position
  169. ; GRAPHICS
  170. ;          esc*b COUNT W DATA
  171. ; RESTORE
  172. ;          esc*rB               end graphics
  173. ;----------------------------------------------------------------------------
  174.   DEFINE DATA,ROW
  175.  
  176.   DISPLAYMODE 4,5,13,19                                 ; 320x200  96x96dpi
  177.     SETUP 27,42,116,57,54,82,27,42,114,65
  178.     GRAPHICS 27,42,98,COUNT,87,DATA
  179.     PRINTBOX STD,4,3,ROTATE
  180.     RESTORE 27,42,114,66
  181.  
  182.   DISPLAYMODE 6,14                                      ; 640x200 192x96dpi
  183.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  184.     GRAPHICS 27,42,98,COUNT,87,DATA
  185.     PRINTBOX STD,2,2
  186.     RESTORE 27,42,114,66
  187.  
  188.   DISPLAYMODE 15,16                                     ; 640x350 192x96dpi
  189.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  190.     GRAPHICS 27,42,98,COUNT,87,DATA
  191.     PRINTBOX STD,2,1
  192.     RESTORE 27,42,114,66
  193.  
  194.   DISPLAYMODE 17,18                                     ; 640x480 192x96dpi
  195.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  196.     GRAPHICS 27,42,98,COUNT,87,DATA
  197.     PRINTBOX STD,2,1
  198.     RESTORE 27,42,114,66
  199. ;----------------------------------------------------------------------------
  200. PRINTER QUIETJETPLUS
  201. ;
  202. ; SETUP
  203. ;          esc*t96R             select 96x96dpi
  204. ;          esc*t192R            select 192x192dpi
  205. ;          esc*t1280S           select 192x96dpi
  206. ;          esc*rA               start graphics at current cursor position
  207. ; GRAPHICS
  208. ;          esc*b COUNT W DATA
  209. ; RESTORE
  210. ;          esc*rB               end graphics
  211. ;----------------------------------------------------------------------------
  212.   DEFINE DATA,ROW
  213.  
  214.   DISPLAYMODE 4,5,13,19                                 ; 320x200 96x96dpi
  215.     SETUP 27,42,116,57,54,82,27,42,114,65
  216.     GRAPHICS 27,42,98,COUNT,87,DATA
  217.     PRINTBOX STD,4,3,ROTATE
  218.     RESTORE 27,42,114,66
  219.  
  220.   DISPLAYMODE 6,14                                      ; 640x200 96x96dpi
  221.     SETUP 27,42,116,57,54,82,27,42,114,65
  222.     GRAPHICS 27,42,98,COUNT,87,DATA
  223.     PRINTBOX STD,4,1,ROTATE
  224.     RESTORE 27,42,114,66
  225.  
  226.   DISPLAYMODE 15,16                                     ; 640x350 192x96dpi
  227.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  228.     GRAPHICS 27,42,98,COUNT,87,DATA
  229.     PRINTBOX STD,4,3
  230.     RESTORE 27,42,114,66
  231.  
  232.   DISPLAYMODE 17,18                                     ; 640x480 96x96dpi
  233.     SETUP 27,42,116,57,54,82,27,42,114,65
  234.     GRAPHICS 27,42,98,COUNT,87,DATA
  235.     PRINTBOX STD,2,2
  236.     RESTORE 27,42,114,66
  237. ;----------------------------------------------------------------------------
  238. PRINTER RUGGEDWRITER
  239. ;
  240. ; SETUP
  241. ;          esc*t90R             select 90dpi
  242. ;          esc*t180R            select 180dpi
  243. ;          esc&a#H              move curser position, in decipoints.
  244. ;          esc*r1A              start graphics at current cursor position.
  245. ; GRAPHICS
  246. ;          esc*b COUNT W DATA
  247. ; RESTORE
  248. ;          esc*rB               end graphics
  249. ;----------------------------------------------------------------------------
  250.   DEFINE        DATA,ROW
  251.  
  252.   DISPLAYMODE   4,5,13,19                               ; 320x200 180dpi
  253.     SETUP       27,42,116,49,56,48,82,27,38,97,49,50,54,48,72,27,42,114,49,65
  254.     GRAPHICS    27,42,98,COUNT,87,DATA
  255.     PRINTBOX    STD,4,3,ROTATE
  256.     RESTORE     27,42,114,066
  257.  
  258.   DISPLAYMODE   6,14                                    ; 640x200 180dpi
  259.     SETUP       27,42,116,49,56,48,82,27,38,97,49,50,54,48,72,27,42,114,49,65
  260.     GRAPHICS    27,42,98,COUNT,87,DATA
  261.     PRINTBOX    STD,4,2,ROTATE
  262.     RESTORE     27,42,114,066
  263.  
  264.   DISPLAYMODE   15,16                                   ; 640x350  90dpi
  265.     SETUP       27,42,116,57,48,82,27,38,97,49,51,53,72,27,42,114,49,65
  266.     GRAPHICS    27,42,98,COUNT,87,DATA
  267.     PRINTBOX    STD,2,1,ROTATE
  268.     RESTORE     27,42,114,066
  269.  
  270.   DISPLAYMODE   17,18                                   ; 640x480  180dpi
  271.     SETUP       27,42,116,49,56,48,82,27,38,97,57,53,48,72,27,42,114,49,65
  272.     GRAPHICS    27,42,98,COUNT,87,DATA
  273.     PRINTBOX    STD,2,2,ROTATE
  274.     RESTORE     27,42,114,066
  275. ;----------------------------------------------------------------------------
  276. PRINTER RUGGEDWRITERWIDE
  277. ;
  278. ; SETUP
  279. ;          esc*t90R             select 90dpi
  280. ;          esc*t180R            select 180dpi
  281. ;          esc&a#H              move curser position, in decipoints.
  282. ;          esc*r1A              start graphics at current cursor position.
  283. ; GRAPHICS
  284. ;          esc*b COUNT W DATA
  285. ; RESTORE
  286. ;          esc*rB               end graphics
  287. ;----------------------------------------------------------------------------
  288.   DEFINE        DATA,ROW
  289.  
  290.   DISPLAYMODE   4,5,13,19                               ; 320x200 90dpi
  291.     SETUP       27,42,116,57,48,82,27,38,97,49,55,49,48,72,27,42,114,49,65
  292.     GRAPHICS    27,42,98,COUNT,87,DATA
  293.     PRINTBOX    STD,4,3,ROTATE
  294.     RESTORE     27,42,114,066
  295.  
  296.   DISPLAYMODE   6,14                                    ; 640x200 90dpi
  297.     SETUP       27,42,116,57,48,82,27,38,97,49,55,49,48,72,27,42,114,49,65
  298.     GRAPHICS    27,42,98,COUNT,87,DATA
  299.     PRINTBOX    STD,4,1,ROTATE
  300.     RESTORE     27,42,114,066
  301.  
  302.   DISPLAYMODE   15,16                                   ; 640x350  90dpi
  303.     SETUP       27,42,116,57,48,82,27,38,97,50,48,55,48,72,27,42,114,49,65
  304.     GRAPHICS    27,42,98,COUNT,87,DATA
  305.     PRINTBOX    STD,2,1,ROTATE
  306.     RESTORE     27,42,114,066
  307.  
  308.   DISPLAYMODE   17,18                                   ; 640x480  180dpi
  309.     SETUP       27,42,116,49,56,48,82,27,38,97,50,57,55,48,72,27,42,114,49,65
  310.     GRAPHICS    27,42,98,COUNT,87,DATA
  311.     PRINTBOX    STD,2,2,ROTATE
  312.     RESTORE     27,42,114,066
  313. ;----------------------------------------------------------------------------
  314. PRINTER THINKJET
  315. ;
  316. ; SETUP
  317. ;          esc*r640S            select 96dpi
  318. ;          esc*r1280S           select 192dpi
  319. ;          esc*rA               start graphics at current cursor position.
  320. ; GRAPHICS
  321. ;          esc*b COUNT W DATA
  322. ; RESTORE
  323. ;          esc*rB               end graphics
  324. ;----------------------------------------------------------------------------
  325.   DEFINE DATA,ROW
  326.  
  327.   DISPLAYMODE 4,5,13,19                                 ; 320x200 192x96dpi
  328.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  329.     GRAPHICS 27,42,98,COUNT,87,DATA
  330.     PRINTBOX STD,4,2
  331.     RESTORE 27,42,114,66
  332.  
  333.   DISPLAYMODE 6,14                                      ; 640x200 192x96dpi
  334.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  335.     GRAPHICS 27,42,98,COUNT,87,DATA
  336.     PRINTBOX STD,2,2
  337.     RESTORE 27,42,114,66
  338.  
  339.   DISPLAYMODE 15,16                                     ; 640x350 192x96dpi
  340.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  341.     GRAPHICS 27,42,98,COUNT,87,DATA
  342.     PRINTBOX STD,2,1
  343.     RESTORE 27,42,114,66
  344.  
  345.   DISPLAYMODE 17,18                                     ; 640x480 192x96dpi
  346.     SETUP 27,42,114,49,50,56,48,83,27,42,114,65
  347.     GRAPHICS 27,42,98,COUNT,87,DATA
  348.     PRINTBOX STD,2,1
  349.     RESTORE 27,42,114,66
  350. ;----------------------------------------------------------------------------
  351. PRINTER GRAPHICS,THERMAL    ;; 5152, 4201, 4202(8"), 5201-002(8"), 5202, 3812
  352.                             ;; 4207, 4208, 5140
  353.  
  354.    ; Maximum Print width: 8"
  355.    ; Horizontal BPI: 120    Vertical BPI: 72
  356.    ; SETUP Statements contain the following escape sequences:
  357.    ;   27,51,24 = set line spacing to 24/216
  358.    ; GRAPHICS Statements use ESC "L" with the last two bytes being
  359.    ;  the data count (low,high)
  360.  
  361.   DISPLAYMODE 4,5,13,19     ;; 320x200 > 6.7"x8.9" rotated
  362.     SETup 27,51,24
  363.     GRAPHICS 32,32,32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  364.     PRINTBOX STD,4,2,ROTATE
  365.     PRINTBOX LCD,2,2,ROTATE
  366.  
  367.   DISPLAYMODE 6,14         ;; 640x200 > 6.7"x8.9" rotated
  368.     SETup 27,51,24
  369.     GRAPHICS 32,32,32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  370.     PRINTBOX STD,4,1,ROTATE
  371.     PRINTBOX LCD,2,1,ROTATE
  372.  
  373.   DISPLAYMODE 15,16        ;; 640x350 > 5.8"x8.9" rotated
  374.     SETup 27,51,24
  375.     GRAPHICS 32,32,32,32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  376.     PRINTBOX STD,2,1,ROTATE
  377.     PRINTBOX LCD             ;; PC/Convertible doesn't support these modes
  378.  
  379.   DISPLAYMODE 17,18        ;; 640x480 > 8"x8.9" rotated
  380.     SETup 27,51,24
  381.     GRAPHICS 27,76,LOWCOUNT,HIGHCOUNT
  382.     PRINTBOX STD,2,1,ROTATE
  383.     PRINTBOX LCD             ;; PC/Convertible doesn't support these modes
  384. ;---------------------------------------------------------------------------
  385. PRINTER COLOR8               ;; 5182 CMY Ribbon
  386.  
  387.    ; Maximum Print width: 8"
  388.    ; Horizontal BPI: 168 in 1:1 aspect ratio, 140 in 5:6 aspect ratio
  389.    ; Vertical BPI: 84
  390.    ; SETUP Statements contain the following escape sequences:
  391.    ;   27,51,14 = set line spacing to 14/144
  392.    ;   27,110,[0|1] = 0 sets aspect ratio to 5:6, 1 sets it to 1:1
  393.    ; GRAPHICS Statements use ESC "L" with the last two bytes being
  394.    ;  the data count (low,high)
  395.  
  396.   COLORSELECT Y,27,121       ;; yellow band
  397.   COLORSELECT M,27,109       ;; magenta band
  398.   COLORSELECT C,27,99        ;; cyan band
  399.   COLORSELECT B,27,98        ;; black band
  400.                              ;;
  401.                              ;; Following RGB's represent the first 16
  402.                              ;; screen colors.
  403.                              ;; SCREEN COLOR       PRINT COLOR
  404.                              ;; ------------       -----------
  405.   COLORPRINT 0,0,0,B         ;; BLACK              BLACK
  406.   COLORPRINT 0,0,42,C        ;; BLUE               CYAN
  407.   COLORPRINT 0,42,0,Y,C      ;; GREEN              GREEN
  408.   COLORPRINT 0,42,42,C       ;; CYAN               CYAN
  409.   COLORPRINT 42,0,0,Y,M      ;; RED                RED
  410.   COLORPRINT 42,0,42,C,M     ;; PURPLE             PURPLE
  411.   COLORPRINT 42,21,0,Y,C,M   ;; BROWN              BROWN
  412.   COLORPRINT 42,42,42        ;; LOW WHITE          WHITE (NOTHING)
  413.   COLORPRINT 21,21,21,B      ;; GREY               BLACK
  414.   COLORPRINT 21,21,63,C      ;; HIGH BLUE          CYAN
  415.   COLORPRINT 21,63,21,Y,C    ;; HIGH GREEN         GREEN
  416.   COLORPRINT 21,63,63,C      ;; HIGH CYAN          CYAN
  417.   COLORPRINT 63,21,21,Y,M    ;; HIGH RED           RED
  418.   COLORPRINT 63,21,63,M      ;; MAGENTA            MAGENTA
  419.   COLORPRINT 63,63,21,Y      ;; YELLOW             YELLOW
  420.   COLORPRINT 63,63,63        ;; HIGH WHITE         WHITE (NOTHING)
  421.  
  422.   COLORPRINT 42,42,0,Y       ;; This statement maps the "yellow" in CGA
  423.                              ;;  palette 0 to yellow
  424.                              ;;
  425.   DISPLAYMODE 4,5,13,19       ;; 320x200
  426.     SETUP 27,51,14,27,110,0   ;; aspect ratio = 5:6
  427.     GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  428.     PRINTBOX STD,4,2,ROTATE
  429.   DISPLAYMODE 6,14            ;; 640x200
  430.      SETUP 27,51,14,27,110,0  ;; aspect ratio = 5:6
  431.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  432.      PRINTBOX STD,4,1,ROTATE
  433.   DISPLAYMODE 15,16           ;; 640x350
  434.      SETUP 27,51,14,27,110,1  ;; aspect ratio = 1:1
  435.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  436.      PRINTBOX STD,3,1,ROTATE
  437.   DISPLAYMODE 17,18           ;; 640x480
  438.      SETUP 27,51,14,27,110,1  ;; aspect ratio = 1:1
  439.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  440.      PRINTBOX STD,2,1
  441. ;---------------------------------------------------------------------------
  442. PRINTER COLOR4               ;; 5182 RGB Ribbon
  443.  
  444.    ; Maximum Print width: 8"
  445.    ; Horizontal BPI: 168 in 1:1 aspect ratio, 140 in 5:6 aspect ratio
  446.    ; Vertical BPI: 84
  447.    ; SETUP Statements contain the following escape sequences:
  448.    ;   27,51,14 = set line spacing to 14/144
  449.    ;   27,110,[0|1] = 0 sets aspect ratio to 5:6, 1 sets it to 1:1
  450.    ; GRAPHICS Statements use ESC "L" with the last two bytes being
  451.    ;  the data count (low,high)
  452.  
  453.   COLORSELECT R,27,121       ;; red band
  454.   COLORSELECT G,27,109       ;; green band
  455.   COLORSELECT B,27,99        ;; blue band
  456.   COLORSELECT X,27,98        ;; black band
  457.                              ;;
  458.                              ;; Following RGB's represent the first 16
  459.                              ;; screen colors.
  460.                              ;; SCREEN COLOR       PRINT COLOR
  461.                              ;; ------------       -----------
  462.   COLORPRINT 0,0,0,X         ;; BLACK              BLACK
  463.   COLORPRINT 0,0,42,B        ;; BLUE               BLUE
  464.   COLORPRINT 0,42,0,G        ;; GREEN              GREEN
  465.   COLORPRINT 0,42,42,B       ;; CYAN               BLUE
  466.   COLORPRINT 42,0,0,R        ;; RED                RED
  467.   COLORPRINT 42,0,42,R       ;; PURPLE             RED
  468.   COLORPRINT 42,21,0,X       ;; BROWN              BLACK
  469.   COLORPRINT 42,42,42        ;; LOW WHITE          WHITE (NOTHING)
  470.   COLORPRINT 21,21,21,X      ;; GREY               BLACK
  471.   COLORPRINT 21,21,63,B      ;; HIGH BLUE          BLUE
  472.   COLORPRINT 21,63,21,G      ;; HIGH GREEN         GREEN
  473.   COLORPRINT 21,63,63,B      ;; HIGH CYAN          BLUE
  474.   COLORPRINT 63,21,21,R      ;; HIGH RED           RED
  475.   COLORPRINT 63,21,63,R      ;; MAGENTA            RED
  476.   COLORPRINT 63,63,21        ;; YELLOW             WHITE (NOTHING)
  477.   COLORPRINT 63,63,63        ;; HIGH WHITE         WHITE (NOTHING)
  478.  
  479.   COLORPRINT 42,42,0,B       ;; This statement maps the "yellow" in CGA
  480.                              ;;  palette 0 to blue as was done in
  481.                              ;;   versions of GRAPHICS
  482.                              ;;
  483.   DISPLAYMODE 4,5,13,19       ;; 320x200
  484.     SETUP 27,51,14,27,110,0   ;; aspect ratio = 5:6
  485.     GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  486.     PRINTBOX STD,4,2,ROTATE
  487.   DISPLAYMODE 6,14            ;; 640x200
  488.      SETUP 27,51,14,27,110,0  ;; aspect ratio = 5:6
  489.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  490.      PRINTBOX STD,4,1,ROTATE
  491.   DISPLAYMODE 15,16           ;; 640x350
  492.      SETUP 27,51,14,27,110,1  ;; aspect ratio = 1:1
  493.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  494.      PRINTBOX STD,3,1,ROTATE
  495.   DISPLAYMODE 17,18           ;; 640x480
  496.      SETUP 27,51,14,27,110,1  ;; aspect ratio = 1:1
  497.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  498.      PRINTBOX STD,2,1
  499. ;---------------------------------------------------------------------------
  500. PRINTER GRAPHICSWIDE   ;; 4202(13.5"), 5201-002(13.5")
  501.  
  502.    ; Maximum Print width: 13.5"
  503.    ; Horizontal BPI: 120    Vertical BPI: 72
  504.    ; SETUP Statements contain the following escape sequences:
  505.    ;   27,88,1,255 = enable 13.5" printing
  506.    ;   27,51,24 = set line spacing to 24/216
  507.    ;   27,51,18 = set line spacing to 18/216 (320x200 MODES ONLY!!)
  508.    ; GRAPHICS Statements use ESC "L" with the last two bytes being
  509.    ;  the data count (low,high)
  510.  
  511.   DISPLAYMODE 4,5,13,19     ;; 320x200  > 10.7"x8.3" non-rotated
  512.     SETup 27,88,1,255,27,51,18
  513.     GRAPHICS 27,76,LOWCOUNT,HIGHCOUNT
  514.     PRINTBOX STD,4,3
  515.  
  516.   DISPLAYMODE 6,14          ;; 640x200 - same as for 8" printing
  517.     SETup 27,88,1,255,27,51,24
  518.     GRAPHICS 27,76,LOWCOUNT,HIGHCOUNT
  519.     PRINTBOX STD,4,1,ROTATE
  520.  
  521.   DISPLAYMODE 15,16         ;; 640x350 > 11.7"x17.8" rotated
  522.     SETup 27,88,1,255,27,51,24
  523.     GRAPHICS 27,76,LOWCOUNT,HIGHCOUNT
  524.     PRINTBOX STD,4,2,ROTATE
  525.  
  526.   DISPLAYMODE 17,18         ;; 640x480 > 12"x17.8" rotated
  527.     SETup 27,88,1,255,27,51,24
  528.     GRAPHICS 27,76,LOWCOUNT,HIGHCOUNT
  529.     PRINTBOX STD,3,2,ROTATE
  530. ;---------------------------------------------------------------------------
  531. PRINTER COLOR1                 ;; 5182 with black ribbon
  532.  
  533.    ; Maximum Print width: 8"
  534.    ; Horizontal BPI: 168 in 1:1 aspect ratio, 140 in 5:6 aspect ratio
  535.    ; Vertical BPI: 84
  536.    ; SETUP Statements contain the following escape sequences:
  537.    ;   27,51,14 = set line spacing to 14/144
  538.    ;   27,110,[0|1] = 0 sets aspect ratio to 5:6, 1 sets it to 1:1
  539.    ; GRAPHICS Statements use ESC "L" with the last two bytes being
  540.    ;  the data count (low,high)
  541.  
  542.   DARKADJUST 0                ; Code a positive number to lighten
  543.                               ;  printing. Suggested value = 10
  544.  
  545.   DISPLAYMODE 4,5,13,19       ;; 320x200
  546.     SETUP 27,51,14,27,110,0   ;; aspect ratio = 5:6
  547.     GRAPHICS 32,32,32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  548.     PRINTBOX STD,4,2,ROTATE
  549.     PRINTBOX LCD,2,2,ROTATE
  550.  
  551.   DISPLAYMODE 6,14            ;; 640x200
  552.     SETUP 27,51,14,27,110,0  ;; aspect ratio = 5:6
  553.     GRAPHICS 32,32,32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  554.     PRINTBOX STD,4,1,ROTATE
  555.     PRINTBOX LCD,2,1,ROTATE
  556.  
  557.   DISPLAYMODE 15,16           ;; 640x350
  558.      SETUP 27,51,14,27,110,1  ;; aspect ratio = 1:1
  559.      GRAPHICS 32,32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  560.      PRINTBOX STD,3,1,ROTATE
  561.      PRINTBOX LCD             ;; PC/Convertible doesn't support these modes
  562.  
  563.   DISPLAYMODE 17,18           ;; 640x480
  564.      SETUP 27,51,14,27,110,1  ;; aspect ratio = 1:1
  565.      GRAPHICS 32,32,32,32,27,76,LOWCOUNT,HIGHCOUNT
  566.      PRINTBOX STD,2,1
  567.      PRINTBOX LCD             ;; PC/Convertible doesn't support these modes
  568. ;===========================================================================
  569. ;                           End of Profile
  570. ;===========================================================================
  571.  
  572.